home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / public / fax / src / port / generic / mkdepend < prev   
Text File  |  1994-08-01  |  6KB  |  232 lines
  1. #! /bin/sh
  2. #    $Header: /usr/people/sam/fax/port/generic/RCS/mkdepend,v 1.6 1994/02/28 14:27:40 sam Rel $
  3. #
  4. # FlexFAX Facsimile Software
  5. #
  6. # Copyright (c) 1990, 1991, 1992, 1993, 1994 Sam Leffler
  7. # Copyright (c) 1991, 1992, 1993, 1994 Silicon Graphics, Inc.
  8. # 
  9. # Permission to use, copy, modify, distribute, and sell this software and 
  10. # its documentation for any purpose is hereby granted without fee, provided
  11. # that (i) the above copyright notices and this permission notice appear in
  12. # all copies of the software and related documentation, and (ii) the names of
  13. # Sam Leffler and Silicon Graphics may not be used in any advertising or
  14. # publicity relating to the software without the specific, prior written
  15. # permission of Sam Leffler and Silicon Graphics.
  16. # 
  17. # THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
  18. # EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
  19. # WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
  20. # 
  21. # IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
  22. # ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
  23. # OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
  24. # WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
  25. # LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
  26. # OF THIS SOFTWARE.
  27. #
  28. # NAME
  29. #    mkdepend - compute header file dependencies
  30. # SYNOPSIS
  31. #    mkdepend [-c compiler] [-e sedprog] [-f force] [-ipr] [-s sentinel]
  32. #        depfile file ...
  33. # DESCRIPTION
  34. #    See mkdepend(1).
  35. #
  36. me=$0
  37. usage="usage: $me [-c compiler] [-e sedprog] [-f force] [-ipr]\n\t[-s sentinel] depfile [file ...]"
  38. depgen="gcc -M"
  39. incremental=no
  40. rawdepinput=no
  41.  
  42. #
  43. # Process options and arguments.  We put quotes around the edit (-e) arguments
  44. # and use eval "sed -e ..." later, to preserve spaces in the edit command.
  45. #
  46. while getopts c:e:f:ip:rs: OPT; do
  47.     case $OPT in
  48.       c)    depgen=$OPTARG;;
  49.       e)    sedprog="$sedprog -e '$OPTARG'";;
  50.       f)    force="$force $OPTARG";;
  51.       i)    incremental=yes;;
  52.       p)    depgen=collapse pcount=$OPTARG rawdepinput=yes;;
  53.       r)    depgen=cat rawdepinput=yes;;
  54.       s)    sentinel=$OPTARG;;
  55.       *)    echo $usage; exit 2
  56.     esac
  57. done
  58. shift `expr $OPTIND - 1`
  59. case $# in
  60.   0)    echo $usage; exit 2
  61. esac
  62.  
  63. newdepfile=$1
  64. depfiledir=`dirname $1`
  65. olddepfile=$depfiledir/#`basename $1`
  66. shift
  67.  
  68. #
  69. # A shell function to collapse dependencies of targets in subdirectories
  70. # on common rightsides.
  71. #
  72. collapse() {
  73.     sed -e 's@/\([^/:]*\): @/%\1: @' $* |
  74.     sort -t% +1 |
  75.     uniq |
  76.     nawk -F: '
  77.     BEGIN {
  78.         total = '$pcount'
  79.     }
  80.     function flush(group, lastdir, dirname, count) {
  81.         for (dirname in group)
  82.             count++
  83.         if (count == total) {
  84.             print group[lastdir]
  85.         } else {
  86.             for (dirname in group)
  87.                 print dirname group[dirname]
  88.         }
  89.         for (dirname in group)
  90.             delete group[dirname]
  91.     }
  92.     {
  93.         percent = index($1, "%")
  94.         name = substr($1, percent + 1)
  95.         if (name != basename || $2 != rightside) {
  96.             flush(group, dirname)
  97.             basename = name
  98.             rightside = $2
  99.         }
  100.         dirname = substr($1, 1, percent - 1)
  101.         group[dirname] = basename ":" rightside
  102.     }
  103.     END {
  104.         flush(group, dirname)
  105.     }' |
  106.     sort
  107. }
  108.  
  109. #
  110. # An awk script to compress and pretty-print dependencies.
  111. #
  112. awkprog='
  113. BEGIN {
  114.     FS = ":"
  115.     INDENT = "\t"
  116.     INDENTSIZE = 8
  117.     MAXLINE = 72
  118.     MAXINDENTEDLINE = MAXLINE - INDENTSIZE - 1
  119. }
  120.  
  121. #
  122. # For each line of the form "target1 ... targetN: dependent", where the
  123. # spaces are literal blanks, do the following:
  124. #
  125. {
  126.     if ($1 != target) {
  127.         if (depline) print depline
  128.         target = $1
  129.         depline= $0 "'"$force"'"
  130.         lim = MAXLINE
  131.     } else {
  132.         if (length(depline) + length($2) > lim) {
  133.             print depline " \\"
  134.             depline = INDENT
  135.             lim = MAXINDENTEDLINE
  136.         }
  137.         depline = depline $2
  138.     }
  139. }
  140.  
  141. END {
  142.     if (depline) print depline 
  143. }'
  144.  
  145. #
  146. # Save the old file in case of problems.  Define some temporary files for
  147. # incremental make depend.  Clean up if interrupted.
  148. #
  149. olddeps=/tmp/olddeps.$$
  150. newdeps=/tmp/newdeps.$$
  151. tmpdeps=$depfiledir/tmpdeps.$$
  152. if test "$incremental" = yes; then
  153.     trapcmds="rm -f $olddeps $newdeps $tmpdeps;"
  154. fi
  155. if test -f "$newdepfile"; then
  156.     trapcmds="$trapcmds mv -f \\$olddepfile \\$newdepfile;"
  157.     ln $newdepfile $olddepfile
  158.     echo "# placeholder in case make includes me" > $tmpdeps
  159.     mv -f $tmpdeps $newdepfile
  160. fi
  161. trap "$trapcmds exit 0" 1 2 15
  162.  
  163. #
  164. # Remove any old dependencies from the file.
  165. #
  166. firstline="#$sentinel DO NOT DELETE THIS LINE -- make depend uses it"
  167. lastline="#$sentinel DO NOT DELETE THIS 2nd LINE -- make depend uses it"
  168.  
  169. if test -f "$olddepfile"; then
  170.     sed -e "/^$firstline/,/^$lastline/d" $olddepfile
  171. fi > $newdepfile
  172.  
  173. #
  174. # Delimit the beginning of the dependencies.  Save the old dependencies
  175. # in incremental mode.
  176. #
  177. echo $firstline >> $newdepfile
  178. if test $incremental = yes; then
  179.     #
  180.     # XXX Workaround for this sed bug: 1,/pat/d deletes 1,$ if line 1
  181.     # XXX and only line 1 matches pat.
  182.     #
  183.     (echo '# food for sed bug to eat'; cat $olddepfile 2> /dev/null) |
  184.         sed -e "1,/^$firstline/d" -e "/^$lastline/"',$d' > $olddeps
  185.  
  186.     #
  187.     # Compose an awk program that deletes pretty-printed dependencies
  188.     # from $olddeps that involve basenames of objects (in the raw input)
  189.     # or sources (arguments) whose dependencies are being updated.
  190.     #
  191.     awkinc='/^[^     ]/ { deleting = 0; }'
  192.     if test $rawdepinput = yes; then
  193.         cat $* > $newdeps
  194.         for f in `sed -e 's@^\([^:/]*\)\.[^:/]*: .*@\1@' \
  195.                   -e 's@^[^:]*/\([^:/]*\)\.[^:/]*: .*@\1@' \
  196.                   $newdeps |
  197.               sort -u`; do
  198.             list="$list $f"
  199.         done
  200.         set -- $newdeps
  201.     else
  202.         for f in $*; do
  203.             list="$list `expr ./$f : '.*/\(.*\)\..*'`"
  204.         done
  205.     fi
  206.     for f in $list; do
  207.         awkinc="$awkinc /^$f\./ || /^[^     :]*\/$f\./ { deleting = 1; }"
  208.     done
  209.     awkinc="$awkinc { if (!deleting) print \$0; }"
  210.     awk "$awkinc" $olddeps >> $newdepfile
  211.     rm -f $olddeps
  212. fi
  213.  
  214. #
  215. # Process source files - the sed commands and their functions are: 
  216. #    s:[^\./][^\./]*/\.\./::g    rewrite "dir/../path" to be "path"
  217. #    s:\([/ ]\)\./:\1:g        rewrite " ./path" to be " path" and
  218. #                    remove the "./" from  ".././h/x.h"
  219. #
  220. # (must escape some metacharacters for systems with busted shells)
  221. #$depgen $* |
  222. depgenxx=`echo $depgen|sed -e s/\'//g -e 's/(/\\(/g' -e 's/)/\\)/g'`
  223. $depgenxx $* |
  224.     eval "sed \
  225.     -e :loop -e 's:[^\./][^\./]*/\.\./::g' -e tloop \
  226.     -e 's:\([/ ]\)\./:\1:g' \
  227.     $sedprog" |
  228.     awk "$awkprog" >> $newdepfile
  229.  
  230. echo $lastline >> $newdepfile
  231. rm -f $olddepfile $newdeps
  232.